home *** CD-ROM | disk | FTP | other *** search
- object Form4: TForm4
- Left = 374
- Top = 251
- BorderIcons = [biMinimize]
- BorderStyle = bsSingle
- Caption = 'System'
- ClientHeight = 127
- ClientWidth = 161
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsStayOnTop
- Position = poScreenCenter
- OnClose = FormClose
- OnCreate = FormCreate
- OnHide = FormHide
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Image2: TImage
- Left = 280
- Top = 3
- Width = 229
- Height = 91
- Picture.Data = {<image000.bmp>}
- end
- object AHMFillBackground1: TAHMFillBackground
- Left = 0
- Top = 0
- Width = 161
- Height = 127
- Background = Form1.AHMBackground1
- Align = alClient
- end
- object Image1: TImage
- Left = 65
- Top = 5
- Width = 32
- Height = 32
- AutoSize = True
- Picture.Data = {<image001.ico>}
- Stretch = True
- Transparent = True
- end
- object Label1: TLabel
- Left = 19
- Top = 40
- Width = 122
- Height = 21
- Caption = 'Enter Password:'
- Color = clWhite
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -19
- Font.Name = 'Times New Roman'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- Transparent = True
- end
- object MaskEdit1: TEdit
- Left = 4
- Top = 64
- Width = 151
- Height = 21
- PasswordChar = '*'
- TabOrder = 0
- end
- object Button1: TButton
- Left = 185
- Top = 86
- Width = 58
- Height = 25
- Caption = 'OK'
- Default = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- Visible = False
- OnClick = Button1Click
- end
- object Button2: TButton
- Left = 264
- Top = 86
- Width = 58
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- Visible = False
- OnClick = Button2Click
- end
- object AHMButton1: TAHMButton
- Left = 13
- Top = 91
- Width = 58
- Height = 25
- Font3D.Style3D = fontInset
- Glyph.TransparentColor = clBlack
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold]
- Caption = 'OK'
- ButtonSunk = True
- Background = AHMBackground1
- OnClick = AHMButton1Click
- ParentFont = False
- TabOrder = 3
- TabStop = True
- end
- object AHMButton2: TAHMButton
- Left = 87
- Top = 91
- Width = 58
- Height = 25
- Font3D.Style3D = fontInset
- Glyph.TransparentColor = clBlack
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'Times New Roman'
- Font.Style = [fsBold]
- Caption = 'Cancel'
- ButtonSunk = True
- Background = AHMBackground1
- OnClick = AHMButton2Click
- ParentFont = False
- TabOrder = 4
- TabStop = True
- end
- object Timer1: TTimer
- Enabled = False
- Interval = 15000
- OnTimer = Timer1Timer
- Left = 65528
- Top = 168
- end
- object Timer2: TTimer
- Enabled = False
- Interval = 100
- OnTimer = Timer2Timer
- Left = 216
- Top = 96
- end
- object AHMBackground1: TAHMBackground
- Gradient.BeginColor = clSilver
- Gradient.EndColor = clGray
- Gradient.ColorCount = 200
- Left = 16
- Top = 8
- end
- end
-